COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	α5αXAUTOWRITE↔α0αXBOTSET↔α0αXTOPSET↔
C00003 ENDMK
C⊗;
α5αXAUTOWRITE⊗↔α0αXBOTSET⊗↔α0αXTOPSET⊗↔

αXPAREN {}⊗↔
αXLISPSYNTAX 173 (⊗↔
αXLISPSYNTAX 176 (⊗↔


αXDEFINE PO⊗↔αxPO⊗↔αxREADWRITE⊗↔αβ⊗↓
αXDEFINE CKPAR⊗↔
	α1α0α0α0αzmovep⊗↔
αβ⊗↓

αXDEFINE movep⊗↔
	α(α)
αβ⊗↓

αXDEFINE FTP⊗↔α5α0α0αxAUTOWRITE⊗↔αxSTOPONE⊗↔αlα∞αzSNDL⊗↔αβ⊗↓
αXDEFINE DUMPER⊗↔αlα∞αzDMPL⊗↔αβ⊗↓
αXDEFINE FUL⊗↔α6α .α3α [α3α β,α3α β]α⊗=α1α9α⊗↑αk⊗↔α⊗↔αβ⊗↓

αXDEFINE SNDL⊗↔
	αxUPPERCASE⊗↔α6α .α3α [α3α β,α3α β]αk⊗↔α⊗↔
	αcαe⊗↑βSβEβNβDβ β β α⊗=→αdα⊗=αlα[⊗↑⊗↔αβ⊗↓
αXDEFINE FTPL⊗↔αcαe⊗↑βSβEβNβDβ β β α⊗=→α⊗=αdα⊗=αl[β⊗↑⊗↔αβ⊗↓
αXDEFINE DMPL⊗↔SAVE αkα→αd⊗↔αβ⊗↓